www.gusucode.com > 良精ASP微博管理系统 V1.0 > 良精ASP微博管理系统 V1.0\code\Include\liangconn.asp

    <!--#include file="adovbs.inc"-->
<!--#include file="../config.asp"-->
<%
'On error resume next
	Set conn = Server.CreateObject("adodb.connection")
	Conn.Open"provider=microsoft.jet.oledb.4.0;data source="&Server.MapPath(""&SysRootDir&""&SiteDataPath&"")
If Err.number <> 0 then
	Response.Write(Web_Name & "正在维护，请稍候访问，谢谢！....")
	Response.End()
End if
%>